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Bag of Tricks 2 


You've been asking when Bag of Tricks, that very popular and 
useful disk utility package, will be updated for ProDOS. Well, 
you can relax now: it'‘s here. 


The new ZAP program in “Bag of Tricks 2" adds the ability to 
access ProDOS blocks, directories, and files; the 80-column 
display can show most of a block at one view. The new version 
of FIXCAT can reconstruct a blown ProDOS directory, as far as 
is possible. You do still need to follow up with ZAP to 
correct things like file size and load address, which 
completely disappear when a directory is damaged. 


This new, non-copy-protected edition of an old friend costs 
$49.95, or $45 + shipping from S-C. Owners of the older Bag of 
Tricks can get an upgrade directly from Quality Software for 
only $20 by returning your original disk. 


Correction to Day of Week Programs 


On page 20 of the December 1985 AAL, change lines 130 and 140 
to the following: 


130 FOR I=0 TO 11 


: READ MD(I) : NEXT 
140 FOR I=0 TO 6 =: READ DS(I) : 


NEXT 
On page 24, same issue, change line 120 to: 
120 FOR I=0 TO 6 : READ D$(I) : NEXT 


That's what we get for typing a program into the Word Processor 
rather than printing a LISTing! 


WildCAT for DOS Bis Bice de i eica ce OS 6 nee aaa ee aaa te eae bya ee ee Sta DEV. Edge 


WildCAT is a series of patches to DOS 3.3 which modify the 
CATALOG command. The new features include: 


* A catalog by “wildcard” FILENAME facility. 

A catalog by FILETYPE facility. 

An alternate, short-form: either DIR or CAT. 
Catalog free space patch. 

Ctrl1-Q catalog abort. 

TYPE a random or sequential text file. 


+ 


+t + & 


Lee Reynold's FILEDUMP command has been re-packaged and 
re-presented as TYPE (see Call-A.P.P.L.E. 6/82 p47). More on 
this later. WildCAT, along with TYPE, is an attempt to teach 
new tricks to an old dog, as it were. 


The normal DOS CATALOG command allows slot, drive, and volume 
parameters. I have added a filename parameter, but process it 
a little differently than the way file names are usually 
processed. To display the catalog entries for all files whose 
names contain a particular string, type any of the following: 


CATALOG “string [,Dn] [,Sn] [,Vn] 
DIR “string [,Dn] [,Sn] [,Vn] 
CAT “string [,Dn] [,Sn] [,Vn] 


where ““string" begins with the """ or caret symbol (shifted N 
on the J[+ or shifted 6 on the //e or //c); the string should 
contain no blanks, although it may “end” with them; the string 
would normally end with a carriage return or with a comma if a 
drive or slot number is specified. Only those files that 
contain the “string” somewhere in the filename will be listed. 
(Of course you already know that the D, S, ana V parameters are 
shown in brackets above because they are optional; you do not 
type the brackets.) 


For example, "CATALOG “TEST” would list each file with 'TEST' 
as part of the filename; while "DIR “PAY.” would list those 
with 'PAY.' somewhere in the filename; and "CAT”.OBJ,D2" would 
list filenames on drive 2 that contain the partial string 
',OBJ'. "CAT" and “DIR” are simply synonyms for "CATALOG". 


I have also arranged things so you can list the catalog entries 
of a specified file-type. You simply type the file type code 
in the CATALOG command: 


CATALOG t [,Dn] [,Sn] [,Vn] 
DIR t [,Dn] [,Sn] [,Vn] 
CAT t [,Dn] [,Sn] [,Vn] 


where “t“ is any of the unadorned, sSingle-letter filetypes: A B 
I RS T. Only that type of file (if present) will be listed. 


For example, "CATALOG T" would list all the text files; "DIR 
A,D2" would list all of the Applesoft files on drive 2; “CAT 
B,S5,D1" would list all the binary files on slot 5, drive l. 
Yes, "DIRT" works just fine. 
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S-C Macro Assembler Version 2.0......-DOS $100, ProDOS $100, both for $120 
ProDOS Upgrade Kit for Version 2.0 DOS OwWnerS...cccrcrccccccccccccesee 930 
Version ea Upseed’ Kit. for .1:00/1L4:17 1.2 OWNELS 66:6 0: 0eeie6 66 wie eso aswis'e BLO 
Source Code of S-C Macro 2.0 (DOS only)......ceeccvceeeese- additional $100 
Full Screen Editor for S-C Macro (with complete source code)..........$49 
S-C Cross Reference Utility......without source code $20, with source $50 
RAK-Ware DIE SASI ses tice heee 6 ore Rew Wwe sel ae a ocean ew ete Eee Ee 8 a aca ol eet Woe aie eee OU 
Source Code for DISASM vcisivceews cviewec eee cere s see ee ee een eee @Gditional $30 
S-C Word Processor (with complete Source COde)....cccvccccscccvecvesss 9 D0 
DP18 Source and OD TSC raiiiiad 6.05 60) Sw Wks weeds Rae we wi ee SOR OS oS OU 
Double Precision Floating Point for Applesoft (with source code)......$50 
"Bag of Tricks", Worth & Lechner, with diskette......ceeceee- ($39.95) $36 
"Bag Of “TLiCKS 2" « acive 0:60 0b Wes Oe bes Sse eM oa eweeweew EF OEIs95): -$45 * 
MacASM -- Macro Assembler for MacIntosh (Mainstay).........($150.00) $100 * 
S-C Documentor (complete commented source code of Applesoft ROMS).....$50 

Source Code of //e CX & FB ROMS On GiSk...cccccccccccccccccceveceseeseSlD 

Cross Assemblers for owners of S-C Macro Assembler.....$32.50 to $50 each 

(Available: 6800/1/2, 6301, 6805, 6809, 68000, 2-80, 2-8, 8048, 
8051, 8085, 1802/4/5, PDP-1l, GI1650/70, others) 


* 


AAL Quarterly DiSkKS.....cccccccccccccceceese each $15, or any four for $45 
Each disk contains the source code from three issues of AAL, 

Saving you lots of typing and testing. 

The quarters are Jan-Mar, Apr-Jun, Jul-Sep, and Oct~Dec. 

(All source code is formatted for S-C Macro Assembler. Other assemblers 
require some effort to convert file type and edit directives.) 


¢ 


Diskettes (with hub ringS)......ccccceesecceveecese package Of 20 for $20 
Vinyl disk pages, 6"x8.5", hold two disks each.....cccceeeeeeese- lO for $6 * 
Diskette Mailing Protectors (hold 1 or 2 disksS).........-...40 cents each 
(Cardboard folders designed to fit 6°X9" Envelopes.) or $25 per 100 * 
Envelopes for Diskette MallerS...cccccccccccccccsscecceseee 6 Cents each 


65802 Microprocessor (Western DeSign Center) ...cceccceseevceeee (999) $50 
quikLoader EPROM System (SCRG) ..ccccccccecccccccccsccscccevese (S119) $170 
PROMGRAMER (SCRG) ...cccccccvcccccsscccscescsscscccssccscesecee (9149.50) $140 
Switch=a=Slot. (SCRG) os si s.0ce ew SOW G8 Wiles We e6 aise kia se edaaeas (9179.50): ‘S170 
Extend=a=S10t- (SCRG) a oe :6cssy Gia 0 08 Oe 00-6. Www ew So os ow 0S Wee ewe wow ($35) ~S32 
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"Programming the 65816", EyeS..ccccccccccccvcccsecscevessccsses (922.99) $21 
"Apple //e Reference Manual", Apple Computer....ccccsceeceese ($24.95) $23 
“Apple //c Reference Manual", Apple Computer....ccccccscccee ($24.95) $23 
“ProDOS Technical Reference Manual”, Apple Computer.........($29.95) $27 
"Now That You Know Apple Assembly Language...", Gilder......($19.95) $18 
“Apple ProDOS: Advanced Features for Programmers", Little..($17.95) $17 
"Inside the Apple //¢"; Litt lescc< i06 sewn ses ew te wadeecesew ($19.95). SLE 
"Inside the Apple //e", Little...ccccccccscvcsvccsccccsccseces (919.95) $18 
“Apple II+/IIe Troubleshooting & Repair Guide", Brenner.....($19.95) $18 
“Apple J[ Circuit Description", Gayler....ccccccvcccvsseveses ($22.95) $21 
“Understanding the Apple II", Sather...ccccccccvccsvvesseses (922.99) $21 
“Understanding the Apple //e“, Sathereccccscccccvecceecceses (924.95) $23 
“Enhancing Your Apple II, vol. 1", LancasSter....cccccceceeee (915.95) $15 
“Enhancing Your Apple II, vol. 2", LancaSter....cceeeeeeeeee ($17.95) $17 
“Assembly Cookbook for the Apple II/IIe"“, Lancaster.........($21.95) $20 
“Beneath Apple DOS", Worth & LECHNELr.....cccccccccccecesecsee (919.95) $18 
"Beneath Apple ProDOS", Worth & LeChner....ccccscccsceveccesee (919.995) $18 
“Real Time Programming -- Neglected Topics", Foster.....ee.+- ($9.95) $9 
“Microcomputer GraphicS", MYErS...cccccccccccccscccccssccsees(9l2.99) $12 
"“Assem. Language for Applesoft Programmers", Finley & Myers.($16.95) $16 
“Assembly Lines -- the Book", Wagn€r.cercccccccvececsesscsee (519.95) $18 
"“AppleVisions", Bishop & GrOSSDELGeLr...cccccscccccccecscecsse (939.95) $36 
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* On these items add $2.00 for the first item and 
$.75 for each additional item for US shipping. 
Foreign customers inquire for postage needed. 
Texas residents please add 6 1/8 % sales tax to all orders. 


*** S-C SOFTWARE, P. O. BOX 280300, Dallas, TX 75228 


ek 
aes (214) 324-2050 =e 
*** Master Card, VISA, Discover and American Express *** 
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I added the TYPE command, which allows you to displé; <né 
contents of text files. Both CATALOG and TYPE will cpricrally: 


1. Print "hidden" control characters as inverse: 
POKE 234,0 to print as inverse (default) 
POKE 234,255 to function as-is 


2. Lower case letters may be shifted to upper case: 
POKE -18700,255 no shift (default) 
POKE -18700,223 to shift lower to upper case. 


You can slow down TYPE's output via SPEED=xx or POKE 241,xx; or 
pause by pressing any key; then Ctr1-Q to abort. Also, TYPE 
pauses and waits for a keypress when it encounters a hex 00 
imbedded in the file or at end of file; press Ctr1-Q to quit. 
You may TYPE random text files by holding down REPT-SPACE to 
get past the hex 00's at the end of each logical record. 


The listing that follows is intended for information only: it 
is not BRUNable. My intention is that you prepare the EXEC 
Shown below to actually install the patches. Any word 
processor that produces a straight, sequential text file may be 
used to prepare the EXEC. Of course you can also use the S-C 
Macro Assembler for this purpose. Then, type EXEC WILDCAT to 
apply the patches to DOS 3.3 in memory. After checking it out 
and running any other tests you like, put in a new diskette, 
enter a HELLO program, and type INIT HELLO to “permanently” 
install WildCAT in the DOS on tracks 0, 1, and 2. 


When I wrote WildCAT, I had two main goals in mind: it should 
be a (mostly in-place) code replacement, and it should be 
compatible with the known means of using (abusing?) the 
existing CATALOG code at SAD98-AE69. 


One major deSign conSideration was a mechanism for entering the 
“string/type parameter. This required merely changing the 
“keyword parameter table“ so CATALOG could have a “filename". 


Next, a distinction had to be made between a “wildcard” and a 
“filetype” parameter. It made sense to ‘delimit' the wildcard 
String; then the single-character filetype would be just that: 
a Single character, entered without a delimiter. But this 
“phony" name mechanism has it's own problems: 


First, "What's in a Name?" (DOS Manual p. 16): a filename has 
to start with a letter...which automatically eliminates most 
Special characters (eg, equal, pound, slash, colon, etc) as the 
delimiter. The command parsing routine doesn't really know 
what xt's working on at the time. All it knows is: if a name 
may be present, it must be valid. The validity test is only 
that the first character be equal to or greater that SCO or an 
@-sign. The @-sign could have been used, but it's a problem on 
some 80-column boards; the ~ or caret works nicely (and 
besides, it looks good). 


Second, now that we have a name (however, phony) and since the 


CATALOG command lives in the File Manager (FM) portion of DOS, 
there will be a buffer allocated for it. Unfortunately, the 
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Command Interpreter (CI) DOCAT routine, which calls the FM, 
already “knows" that there will not really be a name, so it 
does not include housekeeping code to deallocate a buffer. So 
merrily allocating files without closing them...after the third 
time: NO BUFFERS AVAILABLE. And naively adding CLOSE (even if 
there were room for it), would have one very undesirable side 
effect if a “regular” catalog were requested: CATALOG-CLOSE 
without FNAME will close all open files. WildCAT instead plays 
a little shell game with DOS: The new DOCAT routine saves the 
first character of FNAME and substitutes a zero. Thereafter, 
neither the File Manager nor the rest of DOS ever knows that a 
name has been entered, so FM never actually allocates a buffer. 


Third, what really should happen if a phony name is not 
entered? A regular catalog, of course, but how would this be 
indicated to WildCAT? Well, the shell game has a Sting. Early 
on when the CI PARSE routine discovers that a filename is a 
valid parameter, it first clears FNAME to all blanks, expecting 
to fill it in with whatever comes in next. If a comma or 
Carriage return comes in next, then FNAME still contains the 
blank; and that's what WildCAT saves off (under the shell) 
before it substitutes the zero. 


Thus, the "sting" is that the CI “tricks” itself into telling 
WildCAT what to do in the absence of a “string/type specifier: 
WildCAT takes a blank to indicate “do a regular" catalog; just 
aS positively as a ""“" indicates “do a wildcard" catalog, and a 
Single character indicates “do a filetype" catalog. 


The blank indicator also helps satisfy the second goal above 
and solves the problem of compatibilty with the “known means" 
of using/abusing the existing CATALOG code. WildCAT simply has 
to put a blank under the shell at each of the points where the 
code could most reasonably be entered without going thru the 
Command Interpreter's new DOCAT routine. That's exactly what 
all the JSR's to the routine AllowENTry are doing. 


Satisfying that second goal takes up a lot of space, however; 
and has somewhat undermined the first constraint: WildCAT 
certainly isn't “in-place” in one place! And I apologize for 
this rather bizarre, serpentine code; I do hope that now you 
understand why some things were done the way they were. 


Although considerable effort was spent to maintain compatibilty 
with the existing DOS commands, there were some compromises: 


1. While the DOS manual (page 22) states: "To specify drive l, 
you use the notation Dl separated from the file name by a 
comma", you can in fact leave out the comma between CATALOG and 
Dl. With WildCAT that comma is now required; otherwise, it 
would take the "D" as a filetype and try to find it ... which 
of course it wouldn't and there would be no files reported. 
This would also be a problem for Applesoft programs that do 
something like: PRINT DS$"CATALOG Dl" without the comma. 
Therefore, WildCAT issues a (late) “SYNTAX ERROR“ message if it 
encounters an undelimited string of length 2 or more. 


2. CATALOG is a favorite routine to execute directly, 
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_ APPLIED ENGINEERING INTRODUCES 
THE TRANSWARP" ACCELERATOR 


The Fastest Apple Accelerator Available a «3.6 MHZ 65¢02 

TransWarp is the new accelerator card from Applied Engineering. “s¥eh. ¢ 256K of ultra-fast on es RAM 

With a TransWarp card in your Apple ll I+, orlle allsoftware willrun sage Accelerates main and auxiliary memory 

up to 3.6 times faster (3.1 times faster is average). TransWarp 28 =e Low power design for cool operation 

works with all Apple software including AppleWorks, Supercalc3a, spy. © Totally transparent operation with all software 

Visicalc, and all educational software, graphics and games. Trans- +28. — ¢ Plugs into any slot including slot 3 of an Apple lle 

Warp is compatible with all standard peripheral cards such as “MMe. © Accelerated 16 bit option available 

Ramworks Il and Apple memory cards, Profile and Sider hard disks, Nr eve: TransWarp will make you more productive (312 times more 
3¥2"" UniDisks, 80 column cards, modems, clock cards, mousesand 384 productive, in fact) because your spreadsheets will recaiculare 
more. You name it, TransWarp accelerates it! Should 16 bit Be faster. and your word processor will move text in the blink of an 
software become available for the Apple, you can get alow cost & A eye. Accounting, engineering, educational, tax analysis and even 
16 bit upgrade chip af any time. ; 4 F games will all have warp speed. 


Why TransWarp Is Best =i “SSE With a TransWarp card in your Apple, you'll easily pass by others 
The other speedup cards only speedup your Apple's main %< using IBM PC's and ATs. In fact, youll have one of the fastest _ 
memory, but TransWarp has 256K of ultra-fast RAM that acceler- “& computers in the galaxy and although TransWarp leaves the 
ates your Apple's main memory, ROM memory and auxiliary competition in the dust, it’s still priced far lower, at only $279. 
memory. And since more and more programs are residing. in 
auxiliary memory, TransWarp can run these programs 3 times : 
faster than the competition. TransWarp doesnt use memory ¥¢ 
caching, which means TransWarp accelerates all software. 


It Couldn't Be Easier " TransWarp™ Accelerator 


Just plug TransWarp into any slot 2 your Apple Il I+ or le, ar 16 bit upgrade (may add later) 


das eee sinthe lle: Just fom OF yOUnAD ple ONG SAG: To order your TransWarp Accelerator call Applied Engineering, 
off it runs 3/2 times faster. Should you ever want fo run ar 9am.to11 pm. 7 Daysat(214) 241-6060, orsend check or 
normal speed, just press the ESC key while turning on your money order to Applied Engineering, PO. Box 798, Carroll 


> 
oN 


r 
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; 


So the next time youre waiting for your computer fo finish, give 
Applied Engineering a call and we'll beam you a TransWarp 

- accelerator card. With our risk free 15 day money back guarantee, 
you have. nothing to lose, except a lor of wasted time. 


Apple. No pre-boor disks are needed. In fact, no software i" Samay ton, TX 75006. MasterCard, Visa and C.O.D. welcome. Texas 


Corrie With TransWarp because none is needed as.the ri ey enews add 5%% sales tax Add $10.00 if outside USA 
_ TransWarp acceleration is completely transparent. : x ; 


Abtor ony 279. 0 Fe suum APPLIED ENGINEERING | 
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bypassing the DOS Command Interpreter. FID, for example, 
provides its CATALOG via the “external” entry to the File 
Manager, which means that the main entry at CATHNDLR must 
provide for a "regular" catalog. It is also possible from 
machine language, however, to bypass both the CI and the FM. 
This usually involves changing the exit JMP address at DONEXT2 
(to return to the user's code) and then jumping directly into 
almost anywhere in the CATALOG code (See the Listing 1 labels 
that begin "at"). I believe most of these cases are covered, 
but you may find some programs, which provide an “internal" 
CATALOG, that just won't work with WildCAT. 


3. In order to both gain some patch Space and provide the 
DIR/CAT short-form command name, the DOS command POSITION was 
eliminated. You may have to look it up just to find out that 
it is, much less what it is. Its relative rarity may be due to 
its implementation: it, like APPEND, finds its way through the 
file one byte at a time...all day long. Any program that uses 
it will now get a syntax error. If POSITION is really needed, 
it can be readily simulated by programming a read-loop to 
discard N-l fields before processing the desired Nth fiela. 


The following is a brief commentary on the assembly listing. 
The paragraph numbers correspond to numbers in comment lines. 


The page zero locations I used (SEB thru SEF) are free, i.e. 
not used by DOS, the Monitor, or the Basics. 


(1) In CMDTBL, replace Integer CHAIN address with TYPE and 
DOCAT address with NewDOCAT. 


(2) Rearrange some code (and change both references to it) to 
add a "print blank” capability. The Command Interpreter uses 
its own vector to a “COUT" routine via CSW at $36; however, the 
File Manager (previously) used the Monitor COUT and CROUT 
routines for printing the catalog. With WilaCAT all of DOS now 
consistently uses the vector at S$9FCA for output; plus it has a 
new BlankOUT routine, all within the original code space. 


(3) Recode a very cumbersome form of the “indexed indirect 
jump“ to use register Y and leave X (which is zero by a 
previous operation) so it can be used in NewDOCAT. 


(4) Replace old DOCAT's 12 bytes of code with a JMP to NewDOCAT 
and use the remainder to space over to column 7 after the file 
length has been displayed. 


(5) NewDOCAT saves the first character of FNAME and substitutes 
a zero to prevent buffer allocation. It then loads 13, the new 
Catalog Function Code, and proceeds to CMDHNDLR2. Function 13 
enters the catalog code past the “allow for irregular, direct 
entry”. 


(6) In the keyword parameter table, change parms to allow a 
filename with CATALOG and a filename, drive, and slot with DIR. 
Set new Function 13 address (previously a “no-op" to NOERROR) 
to WildCAT and change the range check to 14 to allow for it. 
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(7) Replace the Integer CHAIN code; PrtLOCK displays an 
asterisk or blank if the file is locked or not. 


(8) Shorten the "NO BUFFERS AVAILABLE" message to "NO BUFFER" 
and re-use the space to decide which BaSic iS active, then JMP 
to the appropriate decimal print routine; used to print the 
free sector value and catalog filesizes. The value to De 
printed has been previously loaded into A and X. 


(9) First, eliminate the need for "NOT DIRECT COMMAND" error 
message and then re-use the space to check for a "regular" 
catalog (no filename) or for a catalog by filetype 
(undelimited, Single character). If more than a Single, 
non-blank character is detected (ie, 2nd byte of FNAME is not 
blank), then “SYNTAX ERROR" message is issued. 


(10) At beginning of catalog code allow for most normal points 
where the code could be directly entered. The new "official" 
Function 13, WildCAT initializes the FM workarea (per normal) 
and branches to Read VTOC to "find" the first catalog sector. 


(ll) Freespace “prolog"; clear carry and branch around another 
likely “irregular" entry point. Read first/next catalog 
sector, then lookup and save the filetype. Setup Y with 30 for 
name length and branch to CkKFNAME. 


(12) AllowVTOC fakes a “regular” catalog and falls into a JSR 
to read the VTOC. The BCC to initialize linecount is always 
taken; only if there had been an I/O error would the carry be 
set, in which case, control would have passed to the 
error-message-print exit anyway. 


(13) PrtCat displays a catalog line. Note that loc $24, CH, is 
“POKEdG" with 7 for uniform spacing over to the filename. If 
your printer interface board or 80-column card do not support 
this convention, then the display will not be properly spaced. 
The DONEXT routine is unchanged. SKIPLN has been re-arranged 
to allow init linecount, put out a carriage return, and check 
for a keypress (Ctr1-Q to quit) after 22 lines. Note: This 
leaves the cursor in column 37; see below. 


(14) CkKFNAME “looks under the shell“ to figure out what to do. 
A caret indicates to check for a wildcard string. After JSR to 
CkCAT, if the equal status is set, then branch to print the 
catalog line. DoWild checks for the occurence of the wilacarad 
string within the filename. $B4C9,X indexes the name in the 
Catalog Sector; $AA75,Y indexes the wildcard string; CatNmLen 
counts from 30 to 0, to scan the whole name. 


(15) FreeSpce counts the free sectors, as indicated by the 
VTOC, loads X and A with the count, and JMPs ToPrtDec. 


(16) WaitCk79 provides the "wait" for TYPE; also checks and 
pits out a carriage return after 79 characters to avoid over- 
printing long lines on certain printers, such as the MX-80. 


(17) TYPE displays the contents of a sequential or random text 
file. A keypress will pause the display, and Ctrl1-Q quits. 
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(18) InvCOUT is used by both CATALOG and TYPE. It converts hi- 
bit off characters to proper inverse. It will optionally show 
control characters as inverse or allow them to "function" as- 
is; and it will optionally “shift" lower case letters to upper 
case, if you do not have a lower case adapter; see “...Options" 
above. Loc SEA, decimal 234, is the Applesoft Hi-Res collision 
counter; it should always be zero, unless you POKE it. 

(19) WaitCQ waits for a keypress and sets the equal status, if 
Ctrl-Q was pressed. 

(20) Replace the inverted phrase DISK VOLUME with FREE SPACE=. 
(21) The DOSCMDS list is moved down 6 bytes. AlloOwENT re-uses 
these 6 bytes to force a blank in FNamel “under the shell" to 
ease “irregular" entries into the catalog code; and clears the 
Carry in case the entry was ‘atADC9' which also cleared the 
Carry. In the command list, TYPE replaces CHAIN and DIR 
replaces POSITION; change SA8BF:43 41 D4 to replace with CAT. 


(22) Change the two references to DOSCMDS to the new location. 
These two changes must be done last as the EXEC is changing the 
very code that is executing. 


I would like to thank Lee Reynolds and Art Schumer for their 
helpful comments and suggestions. 


We Make Measurement And Control Easy! 


12 BIT, 16 CHANNEL, 
PROGRAMMABLE GAIN A/D 
All new 1984 design incorporates the 
latest in state-of-art LC. technologies. 
Complete 12 bitA/D convener, withan 


A/D & D/A 
A/D & D/A Features: 
Single PC card 
8 channels A/D 
8 channels D/A 


SIGNAL CONDITIONER 


Our 8 channel signal conditioner ty designed fur use with both our A/D converters. This 
board incorporates 8 FET op-amps. which allow almost any gain or offset. For example, 
an input signal that vanes from 2.00 to 2.15 volts ofa signal that varies trom 0 to 50 
mV can easily be converted to 0-10V output for the A/D. 


accuracy of 002%! 


16 single ended Channels (single ended 
means that your signals are Measured 
against the Apple’s GND.) of 8” 
differential channels. Most all the 
signals you will measure are single 
ended. 

9 suttware programmable full scale 
ranges, any of the 16 channels can have 
any range at any time. Under program 
control, you can select any of the 
following ranges: +10 volts, + 5V, 
+2.5V, +1.0V, + SOOMV, + 250MV, 

+ 100MV, tSOMV, or + 25MV. 

Very fast conversion (25 micro seconds). 


Anglog input resistance greater than 
1,000,000 ohms. 

Laser-trimmed scaling resistors. 

Low power consumption through the 
use of CMOS devices. 

The user Connector has +12 and -12 
volts On it s0 you Can power yout 
SENSOES, 

Only clomentary programming is 
required to use the A/D. 

The entire system is on one standard 
size plug in card that fits neatly inside 
the Apple. 


Superfast conversion time 

Very easy programming 

Many analog ranges 

Manual contains sample applications 


A/D SPECIFICATIONS 
0.3% accuracy 
On-board memory 
Fast Conversion (.078 MS per channel) 
A/D process totally transparent to 
Apple (looks like memory) 
User programmable input ranges are 
0 to 10 volts, 0 to 5, -5 to +5, -2.5 
to +2.5, -Sto0,-10to90. 


The A/D process takes place on a continuous, 
channel sequencing basis. Data 1s automatic- 
ally transferred to its proper location in the 
on-board RAM. No A/D converter could be 
easier to use. 


D/A SPECIFICATIONS 
0.3% accuracy 
On-board memory 
On-board output buffer amps can 
drive 5 MA 
D/A process ts totally Lransparent to 
the Apple (just poke the data) 
Fast conversion (003 MS per channel) 
User programmable output ranges are 
0 to 5 volts and 0 to 10 volts 


The D/A section contains 8 digital to analog 
converters, with output buffer amplitiers and 


The signal conditioners outputs are on a high quality 16 pin gold LC socket that 
matches the one on the A/D’s s0 a simple ribbon cable Connects the two. The signal 
conditioner can be powered by your Apple or from an external supply 


FEATURES 


4.5” square for standard card cage and 4 mounting hules for standard mounting. The 
signal conditioner does not plug into the Apple. it can be loc ated up to” mile away from 
the A/D. 


22 pin .156 spacing edge card input connector (extra Connectors are easily available i.e. 
Radw Shack). 


Large bread board area. 
Full detadled schematic included. 


PRICE $79 


1/0 32 


Provides 4, 8-Bit programmable I/O 
Ports 


@ Your inputs can be anything from 
high speed logic to simple switches 


Any of the 4 ports can be pro- 
grammed a» an input of an output 


port 


All 1/O lines are TTL (0-5 volt) 
compatible 


@ Programming ts made very easy by 
powerful on-board firmware 


@ The I/O 32 ts your best choice for any 
contral application 


@ System includes sample programs on 


as PRICE $319 
A tew applications may include the moni- 
toring of @ flow @ temperature @ humidi- 
ty @ wind speed @ wind direction @ light 
intensity @ pressure @ RPM @ soil mois- 
ture and many more. 


all interface logic on a single card On-catd 
latches are provided for each of the eight 
D/A converters. No D/A converter could be 
easier to use The on-board amplifiers are 
laser-trimmed during manufacture, thereby 
eliminating any requirement for olf-set 


nulling. PRICE $199 


The 1/O manual includes many programs for inputs and outputs. 


Some applications include: 
Burglat alain, dinection sensing, use wilh relays to turn on liphts, sound bugzers, start 
motos, control ape cecorders aad poaters, use with digital joystick, 


PRICE $89 


Please see our other full page adn Chis magazine for information on Appled Fagmecnng’s Timemaster Clock Card and other products for the Apple. 
Our boards are far superior to most of the Consumer electronics made today. AILLC ‘sare in high quality sockets with mikspec. Components used throughout. PC. buards are plass- epoxy 
with pold contacts. Made in Ameacs to be the best in the world, All products Compatible with Apple Wand //e. 
Apphed tayisecenag’s products are fatly tested with Complete documentation and available for mmmediate delivery. Al products are guaranteed with a no hassle three year watranty. 
Texas Residents Add 5% Sales Tax seo Chesket Maney Order te Call (214)241-6060 
Add $10.00 If Outside U.S.A APPLIED ENGINEERING 9am. to 11 p.m. 7 days a week 
P.O. Box 798 MasterCard, Visa & €.0.D0. Welcome 
Carrollton, TX 75006 No extra charge for credit cards 
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1000 SAVE ERV EDGE'S CODE 
EB- 1838 CatLnCnt -EQ $EB Catalog Linecount 
C- 1070 FType E EC Hold looked-up filetype 
E= 1040 FName1 E EE Hold FNAME shell ist char 
ED- 1050 CatNmLen -EQ $ED CatName her a pa taal bh 
EF- Wy : rata -EQ $EF CatName print-length= 30 
1080 ~PH $9D26 In CMDTBL, command addresses 
9D26- B2 B6 1090 DA TYRE=1 change Integer CHAIN to TYPE 
1100 -PH $9D3E In TBL, change address to 
QD3E- DC A5 139 Sh NewDOCAT-1 new DOCAT in POSITION code 
hie PH aie In ECHO, change old CQUT ref 
OFA8— CA 1140 -DA CA was JSR $9FC5 now JSR $9FCA 
1150 ~-PH $9FC5 Cleanup CDI COUT and CROUT 
QFC5= AJ AO 1160 BlankOUT LDA #" *® and add BLANK out routine 
fe - 2C she DA #$2C fake BIT-NOP on fall-thru 
FC8- AQ 8D 1180 CROUT LDA #$8D DOS vectored CROUT; same loc 
OFCA- 6C 36 00 1190 COUT JMP ($36) DOS vectored COUT; new loc 
1200 ~ PH 710 In PRTERROR ee old COUT 
A710— CA ‘eG i NA $CA was JSR $9FC5 now JSR $9FCA 
1230 -PH $A186 Cap CARE DOCMD; X=0 in NewDOCAT 
A186= AC 5F AA 1240 LDY $AA5F CMDIND 
Riece B 1F 9D is aa QD1F,Y CMDTBL+1; use Y instead of X 
am ] 
A18D=- BQ 1E 9D 1270 LDA $9D1E,Y CMDTBL 
A190- 4 1280 PHA 
A191= 60 1290 RTS 
A192— EA Sr : (ASF 
1320 ~PH $A56E net iace old DOCAT code: 
A56E—- 4C DD AS 1 Be O1dDOCAT JMP NewDOCAT To allow for direct entry 
A571—- AS EC 1340 PrtTYPE LDA Riype Print looked-up filetype 
A573—- 20 CA 9F 1320 JSR COUT and 
A576- 4C C5 OF 1360 JMP BlankOUT a blank 
A579—- EA 1370 3 7 P 
ieee -PH ere Replace old POSITION code: 
A5DD= AD 75 AA 1400 NewDOCAT LDA $AA75 FNAME set by CATALOG command 
A5E0O— 85 EE 1410 STA FName1l save first byte, then zero 
A5SE2- SE 75 AA 1420 STX $AA75 to avoid buffer allocation 
A5E5—- AQ OD cas LDA #13 FM WildCAT Function Code 
A5ET- 4C AA A2 1440 JMP $A2AA CMDHNDL2 routine, per usual 
ne ee) 
1470 -PH $A921 DIR [string] [,Dn] [,Sn] 
A921=- 60 70 00 1490 -DA $428 $70 ->First comma: is NOT optional 
1490 .PH $ho2d CATALOG [string] <[,Dn] [,Sn]> 
A929- 60 1500 “DA #$60 ->Must be CATALOG,D1 or DIR,D2 
1510 ~PH $AAE3 In FM function table, "borrow" 
AAE3- 9A AD 1520 -DA WildCAT-1 otherwise useless address 
1235 ~-PH $AB10 Change panee check from 13 for 
AB10- C9 OE i e ‘ a 14 above now USEFULL address 
1220 ~-PH $AN4FO Replace Integer CHAIN code 
ANFO=- AQ AO WAG PrtLOCK LDA #" " blank=unlocked 
cares Be . BY ep ree po acery Catalog Filetype entry 
ANF7=- AQ AA 1600 LDA gran Blocked 
A4F9=- 4C CA OF ey pobrint., MP COUT Print * * or "#" indicator 
1630 -PH $A9FD Shorten NO BUFFER([S AVAILABLE] 
AOFD- D2 1eho -AS -"R" to free 11 bytes for ToPrtDec: 
a9FE= 2C 06 EO 1690 ToPrtDec BIT sE006 Check which Basic... 
AAOQi=- 30 0 1660 BMI Tolnt Integer or 
AAO3=- 4C 24 ED 1670 JMP $ED24 BPP losers use appropriehs 
AAOQb= 4C 1B E5 1086 ToInt dur $E51B print decimal routine 
i700 -PH $A021 Replace JSR ISBASRUN to allow 
AO21—- EA 1710 NOP ALL commands entered direct 
A0Q22=- EA 1720 NOP then error msg is redundant so 
A023—- EA 1730 NOP ok to re-use msg space below 
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3.f/ Meg 16-Bit ile 


Why pay more for a lesser card just because it’s advertised a lot? You can buy Checkmate Technology's State-Of-The-Art 
MULTIRAM lie™ that works great in 8-Bit (100%), has an optional real 16-Bit 65C816 slot saver Co-Processor card, PORT FOR 
OPTIONAL BATTERY BACKED-UP MEMORY, FREE RGB, & in coming months semi-permanent STATIC RAM options that can 


load & save entire programs, like AppleWorks, up to 10 years! 


° MULTIRAM ile IS A DIRECT SUBSTITUTE FOR 
RAMWORKS I!" or Apple Ext 80 column cards. It 
RUNS ALL (100%) 3rd PARTY SOFTWARE that the 
others do. 

TWO MAIN BOARDS TO PICK FROM both with 16-Bit 
port, sharp 80 columns & Double Hi-Res Graphics. One 
with FREE RGB & STATIC RAM PORT-expandabie to 
1024k standard RAM + 2048k BATTERY BACKED-UP 
STATIC RAM, and one without RGB or port-expandable to 
768k. Both cards can piggyback for a TOTAL POSSIBLE 
MEMORY OF 3.75 MEGABYTES IN ONE SLOT. AND 
UNLIKE RAMWORKS Ii, there is never a chance to touch 
cards in slot one (such as Super Serial Card). 
OPTIONAL 16-Bit 65C816 CO-PROCESSOR CARD 
that plugs into MULTIRAM using no slots! TRULY STATE- 
OF-THE-ART, BUT IT CAN'T RUN ON RAMWORKS"™! 


FREE APPLEWORKS TIME/DAY/DATE ON-SCREEN 
SOFTWARE. FREE AUTO-COPY SOFTWARE (disk to 
RAM). FREE ULTRA-FAST RAM DISK SOFTWARE that 
can be run alone or WITH APPLEWORKS. FREE RAM 
TEST & optional CP/M & Pascal Ram disk! 

FREE APPLEWORKS EXPANDER SOFTWARE that 
modifies AppleWorks once-loads ALL (even printer rou- 
tines) or PARTS of AppleWorks into memory, runs 30 x 
faster, increases the Desktop over 1125k, auto-segments 
large files onto multiple disks, stores over 5325 records! An 
increased Clipboard & Word Processor update is due 
soon. 

15 DAY MONEY BACK SATISFACTION GUARANTEE, 
FREE SOFTWARE UPDATES, FREE 64k MEMORY WITH 
EACH 256k/512k CARD, & QUANTITY DISCOUNTS 


FROM COIT VALLEY COMPUTERS. EXCLUSIVE 5 YEAR 
WARRANTY THAT, UNLIKE RAMWORKS, INSURES 
COVERAGE NO MATTER WHERE YOU BOUGHT IT! 
CALL FOR CURRENT PRICES, QUANTITY DISCOUNTS, 
NEW FEATURES OR DETAILS ON CHECKMATE’S 
DIRECT $50 REBATE FOR OLDER CARDS! 


Lower 
OUR LOWPRICE css 
fC“ ‘;..OCOCéiésadwjweeees 


64k MULTIRAM Ile/FREE RGB 
128k MULTIRAM lle/FREE RGB 
320k MULTIRAM Ile/FREE RGB 
576k MULTIRAM Ile/FREE RGB 
768k MULTIRAM Ile/FREE RGB 
1024k MULTIRAM Ile/FREE RGB 
1280k MULTIRAM Ile/FREE RGB 
1536k MULTIRAM Ile/FREE RGB 
1792k MULTIRAM Ile/FREE RGB 


256k Memory Expander Chips (8) 
Apple ile Enhancement Kit 
Clockworks 

(Thunder/Time H.O.™ compatable) 
Pico™ Slimline Drive llc, Ile, [1+ 
65C816 Co-Processor Card 

Pinpoint Software 

CP/M or Pascal Ram Disk (each) 
Accelerator !le-speedup card 


CALL FOR OTHER APPLE PERIPHERAL PRICES. 


Checkmate Technology's State-Of-The-Art llc cards easily expand your llc up to 640k, are 100% compatable with all Ilc software/fardware, & 
come with the SAME FREE SOFTWARE as MULTIRAM Ile. MULTIRAM C is non-upgradable & MULTIRAM CX can be upgraded with a 16-Bit 
65C816 kit! CALL FOR CURRENT PRICING & QUANTITY DISCOUNTS! 


¢ NO JUMPER WIRES, CLIPS, OR DRIVE REMOVAL REQUIRED 
FOR INSTALLATION. ALL CHIPS ARE SOCKETED AND RE- 
MOVABLE-unlike the competition. 


USES ABOUT 50% LESS POWER than the competition-causing 
less power supply strain or battery pack drain! 


15 DAY MONEY BACK SATISFACTION GUARANTEE from 
Coit Valley Computers. 5 YEAR WARRANTY THAT, UNLIKE THE 
COMPETITION, INSURES COVERAGE NO MATTER WHERE 
YOU BOUGHT IT! 


LOWER PRICES-We sell llc cards for much less than the competi- 
tor and our software updates are free, while they usually charge 
$10 or more! 


Lower 
OUR LOW PRICE 
ee ee 


256k MULTIRAM C 
512k MULTIRAM C 


256k MULTIRAM CX 
512k MULTIRAM CX 


16-Bit 65C816 CX Kit ($10 less with card) 

llc System Clock (Same as AE.) 0 

llc Battery Pack & U.P.S. oe 
C-VUE Flat Panel Display ($10 less with card) 


Terms: Add $4-Ground or $6-Air shipping & phone # to each U.S. order (foreign orders extra). Add 3% for P.O.’s (3% 7 net 30) & MasterCard/ 
Visa (include #/expir). For fast delivery send Cashier’s/Certified check, Money Order. C.O.D. (add $5) & personal checks accepted (allow 14 
days). Tex res add 6%% tax. CALL FOR CURRENT PRICES & QUANTITY DISCOUNTS! 


MULTIRAM, Ramworks/Ramworks ll/Timemasler || H.O., Pico respective trademarks of Checkmate Technology. Applied Engineering, WGE 


COIT VALLEY COMPUTERS 


14055 Waterfall Way 
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(214) 234-5047 
Dallas, Texas 75240 


1740 ~PH $AA2C Leyes NOT DIRECT COMMAND msg 
AA2C= C9 AO 1750 CkCAT CMP tn 2s at blank, do regular catalog 


AA30—- AO AO i770 L a " grr be single-char filetype 
AA32- CC 76 AA 1780 CPY $AA76 FNAME+1, ie blank afterwards 
AA35- FO 0 Tae BEQ cis ype if catalog by filetype; else 
AA37T=- 4C C4 A6 1800 JMP $A6 CSYNTAX error 
AA3A- (5 EC 1810 cet ype OM CMP FType Does filetype match? 
AA3C- 60 1820 T 
AA3D—- EA hs NOP 
ne eet: 

1325 ~PH $AD98 
AD98- 20 84 A8 1870 CATHNDLR JSR AllowENT Allow for non-CDI entry 
eee ep oe AB i 2 WATQCRT JS) eeepc tote File Manager Workarea 
ADAO=- 4C F4 AD 1960 atADAO JMP AlowVTOC Allow for non-CDI entry 
ADA3—- EA 1910 atADA3 NOP Allow for non-CDI entry and 
ADA4=- EA 1920 NOP alignment 
ADA5=- 20 84 A 1380 atADA5 JSR AllowENT Allow for non-CDI entry 
ADAS- 20 84 AS 1940 atADA8 JSR AllowENT Allow for non-CDI entry 
ADAB- 20 38 AE ieee henge ee InitCR Init Linecount; output C/R 
ADBI- AD OG” 1940 iDk #12 
ADB3- BD AE B3 1990 PrtFreSP LDA FreeMsg-1 ,X 
ADBo6- a CA 9F Sot a COUT Print FREE SPACE=" 
ADB9- 
ADBA=- DO F7 2020 BNE PrtFreSP X=0 for PrtFreSP 
ADBC- 20 69 BA 2030 JSR FreeSpce Count & print free sectors 
ADCe- 20 2F AE 2050 JSR SKIPLN 
ADC5= 1 2060 CLC Serr for RDNXTDIR to read 
ADC6=- 90 O4 2070 BCC RDNXTDIR first sector; always branch 
ADC8- EA 2080 NOP alignment 


ADC9— 20 84 A8 2090 atADCO JSR AllowENT Allow non-CDI, non-FM entry 
ADCC- 20 11 BO 2100 RDNXTDIR JSR $B011 RDDIRSEC 
ADCF- BO 5B 2110 BCS DONEXT2 


8 2130 G “St "eB RINDX 
ADD3—- SE ag Be 1 ST ke $B 39C DI 


ADDo=- BD B4 2140 »X Track part of T/S list 

ADD9=- FO 51 2150 BEQ DONEXT2 If End of eae ee then exit 
ADDB- 30 48 2160 BMI DONEXT If Deleted hee hen skip it 
ADDD- BD C8 B4 2170 LDA $B4C8, X Gacciog File et ype 

ADEO=- OA 2180 ASL skip hi-bit LOCK/U CK flag 
ADE1=- AO 07 2190 LDY # 

ADE3- OA 2200 FindTYPE ASL 

ADE4=- BO 03 2210 BCS GotTYPE 

ADE6- 88 2220 ae 

ADE7=- DO FA 2230 BNE TYPE 

ADE9=- B9 AT B3 22 Got TYPE Re “S347, Y From filetype table, 

ADEC- 85 EC 2250 STA F Type save looked-up filetype 

ADEE=- AO 1E 2260 LDY #30 Check CatName length an 

ADFO- 84 EF 2270 STY CatPtLen Print CatName length 


ADF2- DO 4B 5500 aye CkFNAME always BNE 
ADF4- 20 84 A8 2300 AlowVTOC JSR AllowENT Allow for non-CDI entry 
ADF7- 20 F7 AF 2310 ToRWVTOC JSR $AFF7 RWVTOC read VTOC 


ADFA- 90 AF e2ca 7 ( 13S CC atADAB always; carry set=I/0 ERROR 
ADFC= EA 53h ide salignment 

ADFD- EA 2350 NOP 

ADFE-,AC 9C B3 2360 PrtCAT LDY $B39C Restore Y from DIRINDX 
AEO1-'20 FO A o3h0 JSR PrtLOCK Print Lock indicator 

AEO4- 20 71 A5 2380 JSR suiea e Print filetype and BlankOUT 
AEO7- BE EZ B4 2390 LDX a Filesize 

AEOA- B9 E8 BY 2400 LDA $B4E8,Y Filesize+1 

AEOD= 20 FE AQ 2410 JSR ToPrtbec Print "true" filesize 
AE10= AO 0 2420 LDY #7 "Poke" CH with 7 to "tab" 

AE12~ 84 2 5130 ge 24 over for filename spacing 
AE14—- AE 9C B3 24 B39C Restore X from DIRINDX 


AE1T=- BD C9 B4 2450 PrtFN LDA t Bie X Print Catalog Filename 
AE1A- 20 DA B6 2460 ace R InvCOUT with optional conversions 


Page 12....Apple Assembly Line....February, 1986....Copyright (C) S-C SOFTWARE 


AE1E- C6 EF 2480 DEC CatPtLen CatName print length 
AE20- DO F5 24 BNE ea 

AE22= 20 2F AE 2500 JSR SKIPLN 

AE25=- 20 30 B2 2510 DONEXT JSR eoeoe NXTDIREN...atAE25 

AE28= 90 AY 2520 BCC G cue 


BCS R DIR 
AE2C- 4C 7F B3 2540 DONEXT2 JMP $B37F NOERROR....atAE2C 
AE2F- C6 EB 2550 SKIPLN DEC CatLnCnt Linecount..atAE2F 


AE31- DO 09 2560 BNE aocr If not zero, C/R & peter 
AE 33- 20 8D B7 2570 JSR WaitCQ else wait for Keypras 
AE36- FO F4 2580 BEQ DONE XT? If Ctrl-Q, exit to NOERROR 
AE38=- AQ 15 2590 InitCR LDA #22-1 else setup for next 22 lines 
AE3A- 85 EB 2600 STA CatLnCnt in line count 
AE3C- 4C C8 OF ae ToCR qu CROUT DOS vectored C/R out 
AE3F- A5 EE 2630 CkFNAME LDA FName 1 Holds FNAME first character 
AE41=- C9 DE 2640 CMP #"°" Wildcard string? 
AE43- FO 07 2650 BEQ DoWild yes...maybe 
AEN5= 20 2C AA 2660 JSR CkCAT Regular or by filetype? 
AE4Y8- FO BY 2670 BEQ PrtCAT yes...else 
AENA- DO DY 26 80 BNE DONEXT none of the above 
AEYC- 84 ED 2690 DoWild STY CatNmLen CatName length=30, for NotEQ 
AEYE- AO 01 2700 LDY #1 Decr'd to 0; indexes FNAME 
hEj0= CO ED e710 NotEQ Dee CatNmLen Checked all 30 chars? 
AE52- 30 D1 2720 BMI DONEXT Yes; no match, do next CatName 
AE54- 4 st 30 BackDown DEX Backdown to 9 string match start 
AE55- 2740 DEY Backdown to 0, ie. FNAME start 
AE56—- DO FC 2750 BNE BackDown “ 
peas : e108 YesEQ IN First Y=1, then on past """ 
AEE B9 75 AA 5420 LDA ie FNAME 
AE5D= C9 AO 5430 CMP tf blank then wildcard EOS and 
AE5F=- FO 9D 2800 BEQ SuHCa. still = =, SO we have a match! 
at O C3 BY a See BY Bo »X FNAME = CatName? 
F64H 
AE66- E8 28 30 INX Beuup X to backdown 1 fest 
- fe) string match start; always 

AEOT DO ET 2840 BNE N SEEQ tech start BNE 
a ae 

ay . PH aN berate Free Space Patch 
BA69= 86 44 28 Epeeshce. Ste 


a te: Init Pree Sec Count var 
PY 50#4 VTOC entries ® entry length 
BA6F- B9 F2 B3 2910 NxBitMap LDA _$B3F2, Y BITMAP-1 in VTOC buffer 


BAT2= OA 2920 CkFree ASL shift hi-order bit into CARRY 
BAT3=- 90 06 29 30 BCC chMore In use, so check if any more 
BAT5= E6 44 2940 INC $44 Incr free sector count 

BATT=- DO F9 2950 BNE CkFree Zero means > 255, so 
BAT9= E6 45 2960 INC $45 iner mpage ® part of word 
BAT7TB- DO F5 2970 CkMore BNE CkFree More bits in same byte? 
BATD- 88 2980 DEY decr index to next VTOC byte 
BA7E- DO EF 29 90 BNE NxBitMap All done? 

BAS8O=- A6 44 3000 LDX $44 Yes, so setup count inX & A 
BA82—= A5 45 010 LDA $45 for decimal print via 

BA84- 4C FE AQ 3020 JMP ToPrtDec one of the BASICs 


030 #----(16)---- 
BA87=- 20 A8 FC 3040 WaitCk79 JSR $FCA8 Monitor WAIT routine 


BA8A- C6 BS 20 0 DEC $55 Decr char cnt 
BA8C- DO 82 060 BNE BA10 Fortuitous RTS; else fall thru 
BA8E=- AQ 4F 3070 InitLine LDA A TYPE proloeraetu 
BA90= 85 5 3080 STA $53 Init printer 80-col char cnt 
BA92= 4C C8 OF 3930 JMP CROUT 
BA95= EA 100 NOP 

3110 sop are 

3120 
B BB- 20 A3 A2 3120 TYPE JSR ovice Bos Open file 
BOBo= 20 BA 3140 DoInitLn JSR InitLine Init char cnt & CROUT 
B6B9- 20 8C A6 3150 ToRead JSR $A68C DOS Read char 
B6BC= FO 14 3160 EQ ToWaitCQ EOF maybe...Ctrl-Q quit? 
B6BE- C9 8 3170 CMP #$8D Carriage return? 
B6CO- FO F 180 BEQ DoInitLn Yes, handle immediately 
B6C2=- 20 DA B6 aan JSR InvCOUT Optional Ctrls & Hibit=0 INV 
B6C5—= A5 F1 200 LDA $F1 Applesoft SPEED=nn byte 
a Gs 20 87 BA 3538 JSR WaitC i Wait SPEED; 79 chars yet? 
BOCA= AD 00 CO 3220 LDA $C0O00 Has a key been pressed? 
B6CD- 10 EA 350 BPL ToRead No, read 
B6CF- 8D 10 CO 3240 STA $C010 Reset peybourd strobe 
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B6D2= 20 8D B7 3200 ToWaitCQ JSR WaitCQ Wait peveceess check Ctr1-Q? 
E2 2 BNE To 


B6D5—- DO Read If not Ctrl-Q, read on 
B6D7= 4C FC A2 E40 P ate $A2FC DOS Close, Deallocate, Exit 
B6DA- A8 290 InvCOUT TAY If < $80, then hibit off 
B6DB- 10 08 300 BPL SetINV so set inverse flag & convert 
B6DD=- C9 AO 3310 CMP #$A0 Ctrl-char? 
B6DF=- BO OE 3320 BCS CkLoCase No 
B6OE1- 24 EA 3330 BIT sEA Uoually loc 234 contains 0: 
B6E3- 30 OA 0 BMI CkLoCase POKE 234,255 skips conversion 
B6E5=- 46 32 3350 SetINV LSR $32 Set Inverse by shifting 0 into 
B6E7= 46 32 3360 LSR $32 INVFLG first rere: set carry 
B6OE9- 29 3F 3330 AND #$3F Turn off 1st 2 bits maps down 
B6EB- 69 iF 0 irae #$1F maps up into hibit-on part of 
B6ED- 49 EO 3390 R #$E0 7 pptlieiclans ae screen-char range 
B6EF- C9 EO 3400 eulsbase ote #$E0 Lower-case? 
B6F1= 90 02 410 ah S ToCOUT No; but POKE -18700,223 or 
B6F3- 29 FF 420 D #$FF BOF4:DF shifts l.c. to U.C. 
B6F5=- 20 CA 9F 3130 ToCOUT ISR COUT DOS vectored COUT 
B6FS=- AY FF 3440 LDA #$FF 
B6FA- 85 32 450 STA $32 Set normal video; always 
B6FC- 60 460 RTS 
3179 #----(19 ares 
3480 B78D Wait key pres; check Ctr1-Q 
B78D= 20 OC FD 3490 WaitCQ ish FDOC Monitor 
B79u=- C9 91 3500 $91 Was it Ctr1-Q? 
B792= 60 3510 RTs 
3520 #----(20)---- 
3530 -PH $B3AF Replace: DISK VOLUME inverted 
B3AF=- BD C5 C 
B3B2= C1 DO D3 
B3B5- AO C 5 
B3B8- De C a2 00 arent So -"=ECAPS EERF " with FREE SPACE= 
3560 H $A884 Setup FName1 for "irre ater 
A884— AQ AO 3270 AllowENT iy #" " entry into CATALOG co 
A886- 8 EE 3 0 STA FName1 Force blank at CkFNAME "abeue 
A888- 1 590 CLC For possible RDNXTDIR entry 
A88 60 3600 RTS 
AB88A- 9 4E 49 
A88D- 3610 DOSCMDS .AT 'INIT' Move down DOSCMDS table and 
A88E- 4C 4F 41 
A891- C4 3620 -AT 'LOAD' re-use the freed space above 
A892- 53 41 56 
Ag 3R- C5 3030 ~AT ‘SAVE! 
A - 52 55 CE 0 -AT ‘RUN! 
A899- 54 59 50 
A89C- C 3650 -AT 'TYPE' was CHAIN 
A89D—- 4 a UC 
A8A0=- 45 54 C5 3660 ~AT ‘DELETE! 
ABA3—- 4C AF 43 
A8A6- CB 3670 ~AT ‘LOCK! 
A8A7=- 55 HE 4C 
A8SAA- 4F 43 CB 3680 ~AT ‘UNLOCK! 
ABAD=- 43 4C UF 
A8BO- 53 C5 3690 ~AT ‘CLOSE! 
ABB2= 52 45 41 
ASB5- C 3700 ~AT ‘READ ' 
ABB6- 45 58 45 
ABB9- C3 3710 ~AT 'EXEC' 
A8BA- 57 52 49 
ASBD- 54 C5 3720 ~AT ‘WRITE’ 
A8BF- 44 49 D2 tl . 1 a5) 'DIR' was POSITION; for CAT:43 41 D4 
3128 -PH $9FFB In Command Interpreter pone 
OFFB- B9 8A A8 3760 LDA SascMpS. Y DOSCMDS table ref. was $A884 
3770 -PH $9FED Only 2 references to DOSCMDS 
QFED- 59 8A A8 3150 EOR DOSCMDS,Y DO THIS AFTER ABOVE CHANGES! 
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CALL =151 
Dak :DC AS . AE25:20 30 B2 90 AQ BO AO AC 
-CA ud 


Practical Programming 
and Hardware Projects 


The Computer Journal is published bimonthly 
and now has in-depth articles on Turbo Pascal, 
“C", Assembly Language, Interfacing, Ampro SBC, 
Operating Systems, etc. 

Some recent articles are: 
eWrite YourOwn DOS 
*Soldering, Unsoldering, & Kit Building 
eExtending Turbo Pascal 
¢Bulld S-100 68K Disk Controller 
Using Apple |i Graphics From CP/M 
eAnalog Data Acquisition & Control 


We publish information for the serious programmer, 
system Implementor, and bulider who Is interested 
in Improving their skills. 


The Computer Journal 

190S Sullivan Crossroad 

Columbia Falis, MT 59912 
(406) 257-9119 


6 issues (one year) $14 in the US-VISA & MC accepted 
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Meet RamWorks IT 


The Recognized Industry Standard For Memory 
Expansion of the Apple Ie. 


i 


Me 
} 
' 
1 
1 
{ 
4 
i 
, Re 
Cc 
' 
U 
4 
1 
1 
1 
1 
} 
i 
i 
re. 


| ell ee ee ee we) 
3m F 
v4 


a | 


Lees 
ri 1 “e Sea 
Re Pe 
' 


APPLIED ey 


Bc 


PO ll eM died oe oe | 
‘ 


RamwWorks II. A Generation Ahead. Again. 


he best selling expansion card for 
ite Apple He just goteven beter. 
With RamWorks TH. expand vour He to an 
incredible 3 megabytes of usable RAM. 


Turbo Charged AppleWorks. 


RamWorks H plugs into the He 
auxiliary slot and acts just like Apple's 
extended 80 column card, only better — 
because if vou buy a 250K or larger 
card, AppleWorks will automatically load 
itself into RamWorks IH. This dramatically 
increases AppleWorks: speed and power 
because it effectively eliminates the time 
required to access disk drive 1. Now, 
switch from word processing to 
spreadsheet to database management at 
the speed of light. AppleWorks responds 
the moment vour fingers touch the 
keyboard. 

But AppleWorks has certain internal 
limits, independent of available memon: 
Fear not. Only RamWorks II (and the 
original RamWorks of course) removes 
those limits. Only RamWorks II increases 
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the maximum number of records 
awailable from 1.350 to over 16 000. Only 
RamWorks TH actually increases the 
number of lines permitted in the word 
processing mode. And only RamWorks II 
features a built-in printer buffer. so vou 
no longer have to wait for vour printer 
to stop before going back to AppleWorks 
(256K or larger RamWorks H required ). 

With RamWorks If, vou wont have to 
split vour data into 2 or more separate 
tiles because vou ll have the necessary 
memory to access ALL vour data ALL the 
time, quickly and conveniently, 


AppleWorks 
Desktop 
101K 
188K 


RamWorks Il 


378K 
758K 
1136K 
2277K 
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The Most Friendly, Most 
Expandable Card Available. 
RamWorks I is compatible with more 
off-the-shelf software than any other 
RAM card. Popular programs like 
Advanced VisiCalc, Magic Office System, 
Flashealc, The Spread Sheet, Diversi- 
DOS, Supercalc 3A, Magicalc, etc. (and 
hardware add-ons like Profile and Sider 
hard disks ). Fact is, only RamWorks is 
100% compatible with all software 
written for the Apple 80 column and 
extended 80 column cards. In addition, 
RamWorks I] can emulate most other 
RAM cards, so you can use programs 
written for them without modification. 
And anv size RamWorks II can be user 
upgraded later to any larger size. 
RamWorks II was designed so you 
could take full advantage of future 
developments in 16 and 32 bit 
microprocessors. As vour needs grow, SO 
can RamWorks II. A handy coprocessor 
connector allows the latest and greatest 
coprocessor cards to access all 3 MEG 


of RamWorks [ memon,. And speaking «eee 2 tee eee pee 512K Expander 
of more memory, RamWorks I has a Fai = 
memory expansion connector on board 
so. alow protile (no slot Linterterence } 
memon expansion card can add 
another 512K or 2 MEG of memon: 
Unlike Apples smaller, more 
expensive RAM card, RamWorks I plugs 
into the Ue auxilian slot and therefore 
leaves slots 4 and 5 available for other 
peripheral cards. 


It's In Color 

RamWorks [bv itself is faa: 
compatible with both the Apple 
monochrome and color monitors. But 
if vou Want better color graphics plzes a 
more readable 80 column text (that 
blows away any composite color 
monitor) vou Hl appreciate our RGB 
color option. For only $129. 1t can be 
added to RamWorks IL giving vou 


a razor sharp. vivid brilliance thats It’s Got It All 
unsurpassed in the industry: The RGB ‘ 


Ke 


hs 
via 
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wee oe 


poe eS ee ee 2 MEG Expander 
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No problem. The 1 
chips on the card that vou 
now have. which is where 
most of the money is. can be 
unplugged and then plugged 
into the expansion sockets 
on RamWorks IL. 


band 


pion downer wise aiotier callable . 15 Dav Monev Back Guarantee * RamDrive ™ the ultimate disk | 

* Super sharp 80 column text (patent emulation software included free 
Ol DERM ner DIMES IMO He DACs OF pending) with or without RGB option | ¢ 16 Bit option 
Ran Works TH with no slot] interterence © Double high resolution graphics * Compatible RGB option 
(works on the original RamWorks, (with or without RGB option) ¢ Built-in self diagnostics software 
too) and attaches to virtually anv RGB ¢ Expandable up to 1 Meg (1024K) on *No slot 1 interference 
monitor, And remember. You can order main board * Lowest power consumption 


(patent pending) 

¢ Takes only one slot (auxiliary) 

¢ Software industry standard 

* Advanced Computer Aided Design 

* Used by Apple Computer, Steve 
Wozniak and virtually all software 
companies 

° Displays date and time on the 
AppleWorks screen with any 
PRO-DOS compatible clock 

* 5 Year no hassle warranty 


RamWorks Il with 64K 
RamWorks Il with 256K 
RamWorks II with 512K 269 
RamWorks liwith 1 MEG $ 389 


RamWorks Il with 1.5 MEG $ 549 
RamWorks ll with 3 MEG $1699 
RGB Option (may add tater) $§ 129 
16 Bit Option (may add later) $ 89 


RamWorks II. The industry standard 
for memory expansion of the Apple Ile. 

ORDER YOUR RamWorks II TODAY. 
9 a.m. to 11 p.m. 7 Days, or send check 


the RGB option with vour RamWorks II. * Expandable to 3 Meg (3072K) with : 
oe add A a a a later date expander (piggyback) card or money order io Applied Engineering. 
It Corrects Mistakes. combination welcome. Texas Residents add 5%% 


* Linear addressing coprocessor port sales tax. Add $10.00 outside U.S.A 


Ee Sa Ou potent some Oui RAM * Automatic AppleWorks expansion up 


card (and that's a mistake ) and vour to 2277K desktop 

RAM card is not being recognized by * Accelerates AppleWorks A f . : 
AppleWorks, Advanced Visicalc, * Built-in AppleWorks printer buffer Applied Engineering 
Flashcalc, Supercalc 3A, or other * The only large RAM card that’s 100% | P.O. Box 798, Carroliton, TX 75006 
programs, and you want RamWorks II. compatible with all Ile software (214) 241-6060 
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Mitsubishi 50740 Series 


I received information from several sources this week about an 
interesting new branch of the 6502 tree. Mitsubishi has pub- 
lished specs for eight varieties, all part of the "740 series". 
The chip is based on the 6502, adds some new addressing modes 
for some of the standard 6502 opcodes, and adds 13 new opcodes. 
(Unfortunately, the opcode enhancements are not compatible with 
any of the other enhanced 6502s.) 


The chips in the 740 series are intended for use as microcon- 
trollers. As such, most of them have on-chip RAM and ROM. 

They all have built-in I/O ports, timers, and other goodies. 
The most interesting (to Don Lancaster, Nigel Nathan, and me) 
is the M50/34. This chip, said to cost only $12, has four A/D 
converters, UART, six timers, a serial I/O port, four 8-bit 1/0 
ports, a pair of stepper-motor drivers, and more. It all lives 
in a 64-pin shrink-DIP package. The M50734 is the only one in 
the 740 series which has no internal ROM and RAM. It is CMOS. 
The clock runs at 8 MHz, which in effect runs the opcodes at 2 
MHz (that is, two cycle instructions take one microsecond). 


To control all these functions, the bytes in page zero from SDA 
through SFF are used as I/O, control, and status registers. 


One of the trickiest enhancements allows direct access (without 
bank switching or bank registers) to a second 64K memory, for 
data only. Apparently one of the address modes changes the 
State of one of the output Signals during data memory 
references; if you use that signal to enable another bank of 
memory. ALMOST like having direct-addressability of 128K. 


The data bus is multiplexed with half of the address bus, so 
it's a little harder to interface. Naturally, to get all the 
functions I mentioned above with only 64 pins, there have to be 
shared pins. Depending on which functions you are uSing, some 
of the timers and some of the I/O pins have dedicated uses. 


The 6502 has one unused status bit. The 740 series calls this 
the T-flag, and gives it a use. If T=l, a Special address mode 
is enabled which allows memory-to-memory operations without 
using the A-register. As I understand it, when T=1, address 
modes which use X aS an index register take on a new meaning: 
rather than moving data between the indexed address and the 
A-register, data is moved between the absolute address and the 
zero page location whose address is in the X-register. If I am 
correct, ADC $400,X (assume X contains $34) would add the 
contents of $400 to the contents of $34, and store the result 
in $34. If T=0, indexing works in the old-fashioned 6502 way. 


Another powerful enhancement allows you call subroutines with a 
two-byte version of the JSR opcode. One variation uses vectors 
Stored in page zero, and the other uses vectors stored $FFO0O0 
through S$FFF3. JMP can also uses vectors stored in page zero, 
so you have a two-byte JMP indirect. 


Four new opcodes give you the ability to set, clear, or test 
any bit in the A-register or in page zero. This uses up 64 


Page 18....Apple Assembly Line....February, 1986....Copyright (C) S-C SOFTWARE 


opcodes, because the bit number and bit state are coded into 
the opcode byte. Rockwell's version of the 65C02 includes 
page-zero bit-addressing, but the opcodes are not the same. 


There are other new instructions, including several about which 
I do not have accurate complete information. 


RRF zp (I think it swaps nybbles in the byte) 
COM zp (Probably forms 2's complement at zp) 
LDM zp (Probably loads ABS(zp) into A-register) 
CLT Clear T-bit in status 

SET set T-bit in status 

STP stop the clock until reset or interrupt 
WIT low power mode ” te . 

SLW (slow?) 

FST (fast?) 

INC increment A-reg 

DEC decrement A-reg 

BRA rel branch always. 


Of all the extensions, only ONE (BRA) 1S compatible with the 
standard 65C02 and 65816 extensions from Western Design Center 
(the OFFICIAL source for 6502 designs). The others, even if 
they do the same thing, uSe a different opcode value. Why? 


If you have worked up an appetite for more information on the 
740 series, contact Mitsubishi. I don't have all their 
numbers, but you can get close by calling 1-800-421-1132. 


When we get all the data, we will be writing a Cross Assembler 
SO you can use your Apple to develop software for this chip. 


NEW FROM 
DON LANCASTER 


HANDS-ON BOOKS UNLOCKED @ SOFTWARE 


Apple Assembly Cookbook 21.50 Absolute Reset lle & llc 19.50 
All About Applewriter 12.50  Applewriter Toolkit (Dos 3.3e) 39.50 
Applewriter Cookbook 19.50 Applewriter Toolkit (ProDOS) 39.50 
Enhancing your Apple vol | 15.50 Both Applewiter Toolkits 59.50 
Enhancing your Apple vol Il 15.50  Applewriter/Laserwriter Utilities 39.50 
Micro Cookbook vol | 15.50  Laserwriter Demo Pack FREE 
Micro Cookbook vol Il 15.50  Appleworks Disassembly Script 49.50 
CMOS Cookbook 14.50 | Enhance vol! Companion Disk 19.50 
TTL Cookbook 12.50 Enhance vol Il Companion Disk = 19.50 
TV Typewriter Cookbook 12.50 | Assembly CB Companion Disk 19.50 
Active Filter Cookbook 14.50  Applewriter CB Companion Disk 19.50 
Incredible Secret Money Machine 7.50 Classic Cell Animation Demo 12.50 


FREE VOICE HELPLINE VISA/MC 


SYNERGETICS 
Box 809-SC 
Thatcher, AZ 85552 
(602) 428-4073 
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Faster Cyclic Redundancy Checking.......... Bob Sander-Cederlot 


In the April 1984 issue of AAL I showed how to compute a cyclic 
redundancy check code (CRC) for a buffer full of data. I also 
tried to explain a little of the theory, as much as I 
understood. In the June 1984 issue Bruce Love explained how to 
work backward from the computed CRC of a received buffer to 
correct a Single bit error. Both of these programs were 
written in plain 6502 code. 


In the February 1986 "Dr. Dobb's Journal" Terry Ritter writes 
about "The Great CRC Mystery". He also presents some Pascal 
programs and 8088 machine code programs for calculating the CRC 
in various ways. Terry describes very briefly a table driven 
method (the very fastest way) and a byte-oriented method 
(almost as fast as table-driven). 


I translated Terry's machine-coded byte-oriented method from 
8088 to 65802 code, but even after twiddling and tweaking for 
half a day I could not make it give the correct answers. I 
don't know if his method is correct or not, but of course it 
MUST be, since it is printed in Dr. Dobb's and since he claims 
it works and since he even tells how many milliseconds it 


takes. 


Anyway, I decided to derive my own byte-oriented method. The 
CRC algorithm is basically a “long division" of the entire bit 
stream in the buffer as though it were one long binary word. 
The divisor is $11021 in the CCITT scheme. The check code we 
use 1S the remainder of the division. The normal algorithm 
does "long division" on a bit-by-bit basis. The byte-oriented 
algorithm does “long division" on a byte-by-byte basis. 


I put long division in quotation marks above because it is not 
EXACTLY long division. The difference is that the subtraction 
steps are replaced with exclusive-or operations. The 
exclusive-or is performed whenever the leading bit of the new 
dividend is a l-bit. Here is a fully worked out example, for a 
CRC-so-far = SE1F0O, and the next byte = SCC: 


"divide" SELFOCC by $11021, "quotient bits" down 
the left edge. Next CRC is the "remainder" 


1110 0001 1111 0000 1100 1100 (ELFOCC in binary) 
1 eor 1000 1000 0001 0000 1 (11021 in binary) 


110 1001 1110 0000 O1 


0 0 1111 1110 1100 0010 
1111 1110 1100 0010 1 
1 eor 1000 1000 0001 0000 1 
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Iic SYSTEM CLOCK 


e Fully ProDos compatible 
e Automatic ime and date stamping 
e Easy to use from BASIC 


e Battery Operated, uses 3 “AA” batteries (will last 1-2 years before 
simple replacement) 


e Date has vear, month, date and day of week 

¢ Time has hours, minutes and seconds 

¢ Will time and date stamp AppleWorks files 

e Will display time and date on the AppleWorks screen 


e Auto access from AppleWorks data-base (just use a time 
and date field) 


e Pass through serial port - The IIc system clock can plug into either 
the modem or printer serial port, then modem or printer 
plugs into the clock 


e No hassle 5 year warranty 


‘“‘We Set the Standard’”’ 
214-241-6060 APPLIED ENGINEERING 9AM-11PM 
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11 0010 1101 1010 000 
1 eOor 10 0010 0000 0100 O01 


1 0000 1101 1110 0010 
1 eor 1 0001 0000 0010 0001 


0001 1101 1100 0011 = $1DC3 


Note that the "quotient" is SEF. This “quotient" can always be 
exactly computed by using just the first byte of the dividend 
(the high byte of the old CRC code): quotient = crchi .eor. 
crchi/16. If you carefully study the worked out example above, 
you should be able to see why this is true. Now, if we use the 
exclusive-or rather than addition to perform a multiplication 
of the quotient times $11021, it will look like this: 


uuuu.vvvv (symbolic quotient in binary) 
x $11021 (multiplier in hexadecimal) 
uuuu. VVVV 
u.uuuu. vvvO0 
uuuu.VVVV 
uuuu.VVVV 


whateveL.cccccce 


There are several significant things to notice about the 
Multiplication above. First, we only need to save the 
rightmost 16 bits of the “product". If we exclusive-or those 
bits with the rightmost 16 bits of the original dividend (which 
means the low byte of the old CRC followed by the new byte), we 
will get the next CRC. (This trick relies on the fact that 
exclusive-or is a reversible operation, so that “adding" and 
“subtracting” give the same result!) 


Furthermore, we can organize those “partial products“ in a more 
efficient way for computation. Now, let's write the original 
CRC symbolically as “aaaa.bbbb.cccc.dddd", and the next data 
byte as “eeee.ffff". The “quotient” after "dividing" by $11021 
will be “aaaa.bbbb exclusive-or 0000.aaaa"“; let's write that 
symbolically as “aaaa.gggg". Then we can compute the next CRC 
code by the following very simple steps: 


cccc.dddd. eeee.ffff 
eor gggg.0000.aaaa.gggg 
eor 000a.aaag.ggg0.0000 


WWWW. XXXX.VYYVY.ZZZZ 
Believe it or not! 


The program that follows implements this algorithm, in lines 
1550-1760. I used 65802 code, but it really could be done 
quite nicely in plain 6502 as well. I leave it as “an exercise 
for the reader“ (as college textbooks are wont to say), should 
you wish to try the algorithm in a plain-vanilla 6502. 
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DISASM 2.2e - AN INTELLIGENT DISASSEMBLER : $30.00 
Investigate the inner workings of machine language programs. DISASM converts machine code into mesningful, 
symbolic source. Creates a standard text file compatible with S-C, LISA, ToolKit and other assemblers. Handles 
data tables, displaced object code & even lets you substitute your own meaningful labels. (100 commonly used 
Monitor and Pg Zero names included.) An address-based triple cross reference table is provided to screen or 
printer. DISASM is an invaluable machine language learning sid to both novice & expert alike. Don Lancaster 
says DISASM is “absolutely essential” in his new ASSEMBLY COOKBOOK. For entire Apple I! family including the 
new Apple //c (with all the new opcodes). SOURCE CODE available for an additional $30.00 


LOW LOW PRICE !!! C-PRINT For The APPLE //c : $69.00 
Connect standard parallel printers to an Apple //c. C-PRINT is a hardware accessary that plugs into the 
standard Apple //c printer serial port. The other end plugs into any printer having a standard 36 pin 
centronics-type parallel connector. Just plug in and print! High speed data transfer at 9600 Baud. No need to 
reconfigure serial port or load software drivers for text printing. 


FONT DOWNLOADER & EDITOR : $39.00 
Turn your printer into a custom typesetter. Downloaded characters remain active while printer is powered. 
Use with any Word Processor program capable of sending ESC and control codes to printer. Switch back and 
forth easily between standard and custom fonts. All special printer functions (like expanded, compressed etc.) 
apply to custom fonts. Full HIRES screen editor lets you create your own characters and special graphics 
symbols. Compatible with many parallel printer |/F cards. User driver option provided. For Apple ti, ll+, //e. 
Specify printer: Apple Dot Matrix, C.ltoh 6510A (Prowriter), Epson FX 80/100, or OkiData 92/93. . 


The Font Downloader & Editor for the Apple Imagewriter Printer. For use with Apple Il, I+, 
//e (with SuperSerial card) and the new Apple //c (with builtin serial interface). 


FONT LIBRARY DISKETTE #1 : $19.00 Contains lots of user-contributed fonts for all printers 
Supported by the Font Downloader & Editor. Specify printer with order. 


The ‘PERFORMER’ CARD : $39.00 
Plugs into any slot to convert a ‘dumb’ centronics-type printer I/F card into a ‘smart’ one. Command menu 
eliminates need to remember complicated ESC codes. Features include perforation skip, auto page numbering 
with date & title. includes large HIRES graphics & text screen dumps. Specify printer: MxX-80 with 
Graftrax-80, MX- 100, MX-80/100 with Graftraxplus, NEC 8092A, C.Itoh 8510 (Prowriter), OkiData 8B2A/83A 
with Okigraph & OkiData 92/95. SOURCE CODE: $30.00 


FIRMWARE FOR APPLE-CAT: The ‘MIRROR’ ROM : $25.00 
Communications ROM plugs directly into Novation's Apple-Cat Modem card. Basic modes: Dumb Terminal, 
Remote Console & Programmable Modem. Features include: selectable pulse or tone dialing, true dialtone 
detection, audible ring detect, ring-back, printer buffer, 60 col card & shift key mod support. Uses superset of 
Apple's Comm card and Micromodem || commands. SOURCE CODE: $50.00 


RAM/ROM DEVELOPMENT BOARD : $30.00 
Plugs into any Apple slot. Holds one user-supplied 2Kx8 memory chip (6116 type RAM for program development 
or 2716 EPROM to keep your favorite routines on-line). Maps into $CnOO-CnFF and $CB00-CFFF. 


ALL WEW/// = [RUDD us/C PRODUCTS 


MIDI means Musical instrument Digital Interfece. Use your computer with any MiDi-equipped music keyboard for 
entertainment and music education. Low cost MID! player interface cable, complete with 6 song demo disk: 
$49.00. Thousands of popular songs available soon on diskette (also compatible with Passport MIDI interface). 
Products for both the Apple lic and Commodore 64/128. Unique general purpose MIDI expander cable and gender 
changer also available. Send SASE for product descriptions and prices. 


Avoid a $3.00 handling charge by enclosing full payment with order. VISA/MC and COD phone orders accepted. 
RAK-WARE 41 Ralph Road W. Orange NJ 07052 (201) 325-1885 
CEECEEEEEEEEEEEEEEEEEEEEEEEEEEEEEEEEE 
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The SEND and RECV programs simulate sending and receiving a 
buffer-full of data. I chose to put my buffer at $4000, for 
258 bytes. This is the same as in the April 1984 article. 


The FIND.BAD.BIT program is Simply a translation of Bruce 
Love's 1984 program into 65802 code. Thanks to 16-bit 
registers, it is significantly faster and shorter. 


Speaking of speed, the code for computing the next CRC code for 
one new byte takes (if I counted correctly) 57 clock cycles. 

In a normal Apple that means about 56 microseconds. The time 
for 8088 machine code in Terry Ritter's article was 17 
microseconds for the equivalent steps. He was running with a 
7.16 MHz clock. If you ran the 65802 code in an Applied 
Engineering Transwarp card or a Titan Accelerator card with a 
4-MHz 65802 (running at 3.58 MHz), the time would be only 15.9 
microseconds in an Apple. 


4000-= 020 BUFFER .EQ $4000 
4102= yee LIMIT .EQ $4102 
1040 #--e ee ene ee en mene we 
00- 1050 CRC ~-EQ $00,01 
02- 1060 PNTR -EQ $02,03 
OA- i TEMP -EQ $0A, 0B 
1080 Sennen nn en en ene ene enn ee 
F941- 1090 PRNTAX .EQ $F941 
FD8E- era CROUT -EQ $FD8E 
1130 : SIMULATE SENDING A BUFFER-FULL 
1140 SEND 
0800- AX 00 120 LDA #0 CLEAR CRC BYTES IN BUFFER 
O0802- 8D 01 41 1160 STA LIMIT-1 
0805= 8D 00 41 nie STA LIMIT=-2 
O408= 20 28 08 1180 JSR NEW.CRC.BUFFER COMPUTE CRC OF 258 BYTES 
O80B=- A6 00 1190 LDX CRC STORE CRC INTO LAST 2 BYTES 
O80D=- A5 01 1200 LDA CRC+1 
O8SOF- 8E 01 41 1210 STX LIMIT=1 
0812- 8D 00 41 1220 STA LIMIT-2 
0815=- 20 41 FI Merc JSR PRNTAX DISPLAY THE CRC 
0818- 4C 8E FD teeo F JMP CROUT <RETURN> AND RETURN 
je0e ; SIMULATE RECEIVING A BUFFER-FULL 
1560 RECV 
081B=- 20 28 08 1290 JSR NEW.CRC.BUFFER COMPUTE CRC OF 258 BYTES 
O81E- A6 00 1300 LDX CRC DISPLAY CRC IN HEX 
0820=- A5 01 1310 LDA CRC+1 
0822= 20 41 FY 1326 JSR PRNTAX 
0825=- 4C 8E FD 1 Be JMP CROUT 
1340 #&~--.~------ - + eee 
1350 -OP 65802 
1308 fee enw ee ne ee eee ee ee 
1 ie # CRCH CRCL DATA 
1380 # aaaa.bbbb.cccc.dddd.eeee.ffff 
rede # +0000.aaaa 
Lt a ae ete 
aaaa.gggeg 
1420 @ +8886. 0000. aaaa. gees 
dine : +000a.aaag.gggd. 
1450 # (erchi) (erclo) 
1460 #-----.------~-- --- = = 
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With Z80 Plus; 
run CP/M-the 
largest body of 
software in 
existence. 


Now, get two computers in one, 
and all the advantages of both. 


nter the CP/M world with the new Z-80 Plus card from Applied 

Engineering, and introduce vour Apple He® or [1 + ® to the thou- 
sands of CPM programs. Only the 7-80 Plus comes standard with the 
new 4.0 software, the most advanced system ever for running CP/M 
programs. 

The new 4.0 boasts advanced features like built-in disk emulation for 
popular memory expansion boards, boosting both system speed and 
storage capacity. And menu-driven utilities that let vou get to work faster. 
The Z-80 Plus also lets vou run older CP/M programs — all the wav down 
to Version 1.6 (2.2 is the most popular). 

The Z-80 Plus is the only card on the market capable of accessing 
more than 64K in an Apple Ile. If you have an extended 80-column 
card, all 128K is usable, and if you have RamWorks, up to 1088K 
is available. 

Each Z-80 Plus comes with our CP/M Ram Drive software, enabling 
Ile owners to usé an extended 80-column card or a RamWorks card as a 
high-speed Ram disk which runs CP/M software up to twenty times faster 
So packages like WordStar and dBASE II run at blinding speed. 

Simply plug the Z-80 Plus into any slot in vour Apple. You'll get the 
benefits of two computers in one — all at an unbelievably low price 
(only $139!). 


* Fully compatible with ALL CP/M software * Fully compatible with 
most hard disks, including Corvus and the Sider * Fully compatible 
with Microsoft disks (no pre-boot required) * Specifically designed 
for high speed operation in the Apple Ile (runs just as fast in the 

Apple II + and Franklin) ¢ Runs WordSur, dBASE II, Turbo Pascal, 
Fortran-80, Peachtree and ALL other CP/M software with no pre-boot 

* Semi-custom I.C. and low parts count allows Z-80 Plus to fly through 
CP/M programs with extremely low power consumption (we use the 
Z-80B ) * Does EVERYTHING other Z-80 boards do, pites Z-80 inter- 
rupts * Five vear warranty 


Call to order today, 9 a.m. to 11 p.m. seven days, or send check or 
money order to Applied Engineering. MasterCard, VISA and C.O.D. 
welcome. Texas residents add 54% sales tax. Add $10.00 outside U.S.A. 


ZT Applied Engineering 
P.O. Box 798, Carrollton, TX 75006 
(214) 241-6060 


Timemaster H.O:; 
the only clock 
_ that displays 
time and date on 
AppleWorks” 
screens and files. 


Now, get all the features of 
all the competition combined! 


L' the smart way to put the ime and date on your Apple 
H+® or He® Because only the Timemaster H.O. packs AL/ 
the features of all the competition combined, including leap 
vear, year (not just in PRO-DOS). month, date. dav of week, 
hours, minutes, seconds and milliseconds. [ts totally PRO-DOS, 
DOS 3.3. PASCAL and CPM compatible. And of course, it works 
beter than any other clock with AppleWorks. 

If voure using or writing software for other clock cards. 
youre sull covered. Because the HO, will automatically emu- 
late them. And the Timemaster H.O. adds 14 new commands to 
BASIC. The HO. even comes complete with two disks full of 
sample programs, including a computerized appointment 
book, a DOS dating program, interrupt programs, and over 30 
programs that others charge extra for — or don't even offer. 

As a low-cost option, vou can add true BSR remote control 
to the HO, giving vou remote control of up to 16 lights and 
appliances in vour home or office. 


° Fully PRO-DOS and DOS 3.3. CP/M and PASCAL compat- 

ble * Time in hours, minutes, seconds and milliseconds 
(the ONLY PRO-DOS compatible card with millisecond 
capability): date with vear, month, day of week and leap vear 

° 24-Hour military format or 12-hour AM’PM format * Eight 
software controlled interrupts so vou can run two programs 
at the same time (manv examples included) ° Allows 
AppleWorks to time and date stamp all data automatically 

* The only clock card that displays time and date on the 


AppleWorks screen °* Five vear warranty 
Clock price we. $129.00 
BSR option (may be added later)... ..... $ 49.00 


Call to order today, 9 a.m. to 1 p.m. seven days, or send 
check or money order to Applied Engineering. MasterCard. 
VISA and C.O.D. welcome. Texas residents add 5%*% sales tax. 
Add $10.00 outside U.S.A. 


FL Applied Engineering 
P.O. Box 798, Carrollton, TX 75006 
(214) 241-6060 
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000828 - 
000829- 
00082A- 
00082C- 
00082F~- 
000831- 


0008 34- 
0008 36- 


00084 9- 
00084 B- 


00085 2- 
00085 4~- 


000856- 
000857- 
00085A- 
00085C- 
00085D- 


10- 


00085E- 
000861 


00086F- 
000870- 


000872- 
00087 3- 
ee ae 
000878- 
00087A- 
00087B- 
00087C- 


000848 


i 
: 


41 


FF 
40 


4) 


0 
08 


00 


F9 


ek ak ek ek ek kee tk et os et ot ts os Cs 2 os 2 a 
WWD DDODOO 00 DO DDOMDMMDMMDOMO OMO~A~I~~ 


ne eee 


a5 
##SFFFF 
CRC 
##BUFFER 


M&X BOTH 16-BITS 


INITIALIZE CRC FOR BUFFER 
POINT TO BUFFER 


CRC=aaaabbbbccccdddd, 
DATA=eeeef fff 


aaaabbbb .eor. OQQUaaaa 
= aaaagege 

0000aaaa 

aaaabbbb 

AGXX 

AGOO 


000a.aaag.ggg0.0000 


0000. aaaa.gggg.0000 
aaaa.bbbb.cccc.dddd 

= aaaa.ggge.kkkk.dddd 
a agama pt Tt 
000a.aaag.ggg0. 


erchi.crclo 


FIND.BAD.BIT 
JSR 


RECV 


ASL 


ENTER NATIVE MODE 

X,M 16 BITS 

X=BIT NUMBER 

START DUMMY CRC IN A-REG 


--FOUND BAD BIT! 
DECREMENT BIT NUMBER 
~. WENT TOO FAR, 
COULDN'T FIND BAD BIT 
SHIFT DUMY CRC 


~+ ALWAYS 
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Correction to Fast Garbage Collector...Bob Sander-Cederlof 


In the March 1984 AAL, Paul Shetler gave us a very fast garbage 
collector for Applesoft. Last week Keith Satterley called from 
Australia, and mentioned he thought there was a bug in the 
handling of strings over 128 characters long. I looked into 
it, and he is right. 


The bug is in the loop in lines 3240-3320, on page 9 of that 
issue. The loop moves a string from one place in memory to 
another. The way we printed the code, a string longer than 128 
Characters would only have one byte moved! Here is the old 
code and the correct code, side-by-side: 


Boe Old COde@====Ss=<s]= =“===COLrrect. :code-===-=== 
3240 LDY STRING. LENGTH 3240 LDY STRING. LENGTH 
3250 DEY 3250 .3 DEY 

3260 .3 LDA (FRESPC) ,Y 3260 LDA (FRESPC) ,Y 
3270 STA (LOWTR) ,Y 3270 STA (LOWTR) ,Y 
3280 DEY 3280 TYA 

3290 BPL .3 3290 BNE .3 

3300 BMI .1 3300 BEQ .l 


Can you see why the new code works and the old doesn't? 


ACCEPT NO SUBSTITUTES. 
BECAUSE THERE AREN’T ANY. 


Tse only one card like RamWorks. We’ve got the best hardware 
design. We supply the best software and we've got the best support from 
software Companies. 


If someone tempts you with an imitation, please get both sides of the 
story. You'll discover why RamWorks offers the best enhancements to 
AppleWorks and other programs, and at the lowest price. 


GUARANTEED! 


214-241-6060 AR 


“We Set the Standard”’ 
9 AM-11 PM APPLIED ENGINEERING 
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Why Are Apple Owners 
So Loyal? 


eople who have the best often are. but in 

the case of Apple there's more. Apple Own- 
ers think back to how Apple got started in 1977, 
just two people working out of a garage and what 
happened is the talk of Wall Street and the 
computer industry as well. Many like the fact that 
Apple only makes computers. Unlike their compe- 
tition they don't make typewriters, copiers or 
telephones. They do just one thing and that’s one 
reason they do it so well. 


At Applied Engineering we think the same way. 
You see, Applied Engineering is the only major 
hardware manufacturer totally dedicated to the 
Apple computer. Whereas most of our competitors 
must divide their customer support and engi- 
neering time between IBM, Atari, Radio Shack or 
other computers, our engineers only design 
products for the Apple. This dedication allows us 
to be much more familiar with the Apple and the 
people who use them. 


We don’t expect you to buy an Applied 
Engineering peripheral on loyalty alone, but 
when you compare our products to those made 
by QUADRAM, MICROSOFT, AST and others you'll 
find out why Applied Engineering means a 
quality design, innovation, craftsmanship and 
total Apple compatibility. 


The other guys do pretty well considering how 
busy they are with IBM. But at Applied Engineer- 
ing, ALL of our work involves the Apple. In fact, 
all of our employees were Apple owners before 
they came to work for us. The people in 
shipping, engineering, quality control, order entrn, 
all use Apples at work and at home. 


This one track mindedness of ours allows us to 
offer the largest storage with AppleWorks and 
Supercale and our Z-80 card now includes the 
new 4.0 operating system. We can expand the 
Apple He to over 3 MEGABYTES of memory and 
we've got clock cards, music cards, A to D 


converters, digital controllers, and a BSR system 
so vour Apple can control vour whole house with 
no additional wiring! 


Applied Engineering recognizes that we've got 
to do a better job than our IBM counterparts 
because we know you're smarter than the 
average computer buyer, you bought an Apple. 
You see, our competition has it a little easier, 
their customers aren't as smart as vou. After all, 
they bought the wrong computer. 


So if vou need more memory, or 80 columns, 
or RGB color, double hi res graphics, if vou want 
to know the time and temperature or other “real 
world” conditions, if vou'd like to run CP/M 
software, have a RAM disk, increase the storage of 
AppleWorks and other programs, if vou want vour 
Apple to play music. talk and sing, if vou'd like 
vour Apple to control the lights and appliances in 
vour house, then do what NASA does, what Ford 
does, what the U.S. Government, Hughes Aircraft 
Honeywell, Westinghouse, AT&T, Apple Computer, 
and even what Steve Wozniak does, call Applied 
Engineering. Then you will discover what thou- 
sands of companies and over a hundred thousand 
Apple owners already know, that vou can be 
smart and loval all at the same time. 


We Set the Standard 


APPLIED ENGINEERING 
(214) 241-6060 


For information and specifications on Applied 
Engineering's line of Appie peripherals, please see 
our ads in this magazine. Prices are given. 


Page 28....Apple Assembly Line....February, 1986....Copyright (C) S-C SOFTWARE 


Viewmaster 80; 
the shar pest 
80 column card 
of them all. 


fsupeveRM TT TT 
Pwisand wy TTT 
Sears, Sane (a (Cee aed 
pomsmision fT TT 
Se ee ee 
ES OO 
MRO nS Yh cer St ee 


Now, get great resolution and 
total software compatibility 


for your Apple IT® or IT+®. 


QO" look at the chart will give you some of the reasons 
theres only one smart choice in 80 column cards for 
vour Apple. But the real secret to Viewmaster 80s success is 
something even better: Total compatibility: 

The Viewmaster 80 works with all 80 column applica- 
tions, including DOS 3.3. PRO-DOS, CP/M, Pascal, WordsStar, 
Format II, Easvwriter, Applewriter I, Supertext 80, Zardax, 
Apple PI. Letter Perfect. dBASE II, Visicalc, Multiplan, and 
hundreds of others. 

And the Viewmaster 80 delivers a super sharp, state-of- 
the-art display with a ~ x 9 character matrix for clear, easily 
readable characters. Here are just a few of the powerful 
features the Viewmaster 80 delivers for a great price ($139): 


° 80 Characters by 24 lines * Fully compatible with all 
Apple languages and software * Super sharp 7 x 9 
character matrix with true descenders * Highest com- 
patibility with existing 80 column software * Power and 
input connector for light pen * Very low power con- 
sumption * High speed (18 MHZ) scroll rate ° Upper 
and lower case characters with true descenders, both in- 
verse and normal; all on-screen editing functions are sup- 
ported ¢ User-definable cursor shape * Compatible 
with Apple H, Il+ and Ie * Five year warranty 


Call to order today, 9 a.m. to 11 p.m. seven days, or 
send check or money order to Applied Engineering. 
MasterCard, VISA and C.O.D. welcome. Texas residents add 
5%% sales tax. Add $10.00 outside U.S.A. 


AC Applied Engineering 
P.O. Box 798, Carrollton, TX 75006 
(214) 241-6060 
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DOS Patch: Prevent Direct Commands.....Richard Gendron 


I operate a AE/CATFUR line using my Apple and a modem in 
Montreal, Quebec. I have found that protecting your DOS from 


illegal entry can be a tough job to say the least. 


In searching for ways to protect my system, I came across an 
interesting address in DOS: at $A026 there is some code which 
is executed whenever you try to type in a DOS command. The 
code checks to see if the command you typed is allowed as a 
direct command, and if not gives you the NOT DIRECT COMMAND 
message (Or ERROR 15 if you are using DiversiDOS). 


I have written a little patch that will catch you when you type 
a DOS command, and re-RUN the Applesoft program. If a sneaky 
caller finds a way to get out of the executing Applesoft 
program, at least he/she will be prevented from doing DOS 
commands. 


Now every lock should have a key. You do want to be able to 
use your own DOS in direct mode, so I have included a way to 
turn off the protection. If you type “PRINT USR (0)" the 
system will respond with "PW:". Then enter a two-character 
password and the protection patch will be removed. Then you 
can CATALOG, DELETE, or whatever you want to do. 


Since I use Diversi-DOS, and in both the 48K and 64K 
configurations, I set up my patching program so that it will 
work with both. The code which checks which version is loaded 
is in lines 1220-1260 and lines 1390-1410. If the output hook 
at $36,37 points up to SBDxx or higher, the 64K version must be 
running. Normal 48K DOS points to S9EBD. 


These patches worked on my system, but yours may be a little 
different depending on which version of DOS you use. Examine 
carefully all the addresses I use inside DOS to see if yours is 
the same as mine before you try to use thesSe patches. 


Lear *SAVE GENDRON DOS MODS 
1020 : DOS PROTECTION FOR THE DIRECT COMMAND "ERROR 15" 
‘One # rei BY RICHARD GENDRON FOR USE ON TRANSFERS ][ 
1 6 : (514) 738-1247 (AE/CAT-FUR) 
1080 -OR $300 
ioke mer erm n ee wee meen enn oneroonn= 
1080 INSTALL 

0300- A ae 4C 1090 LDA gs ic BUILD "USR" VECTOR 

0302- ; OA 1100 STA $0A "JMP" OPCODE 

eam 9 46 1110 LDA #USR 

0306- 2 OB 1120 STA $0B 

: 08- 13 0 a iae LDA /USR 

O30A-'85 0 1140 STA $0C 

1150 #---MOVE DATA INTO DOS----------- 

030C=- A2 04 1160 LDX #P1-PATC HES POINT AT OUR PATCHES 
Ae beliadhad JMP PATCH.DOS 
1190 PATCH.DOS 

Aaa AQ 26 1200 LDA #$A026 

10- 85 00 1210 STA $00 

0 1t2=- A5 37 1220 LDA $37 48K OR 64K DOS? 

0314- C9 BD Vero CMP #$BD cane CLEAR IF 48K 

0316- A9 AO 1240 LDA /$A026 oo 48K 

0318- 90 02 1250 BCC .1 ~- » 48K 

031A- AQ EO 1260 LDA A ches ~-  O4K 

031C=- 85 01 1270 .1 STA $01 
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SOFTWARE PROTECTION 
TECHNIQUES EXPOSED! 


Now, for the first time, owners of Apple // ser- 
ies computers can learn all about the tricks and APPLE 
techniques used to protect Apple software. Ap- SOFTWARE 
ple Software Protection Digest, a new monthly PROTECTION 
tee DIGEST 
publication, will show you how to protect, un- 
protect and backup your software. > 
e Prevent others from accessing your programs a ee ee Sa 
e Make your programs difficult to copy : oe 
¢ Overcome protection schemes on commercial 
software Contents 
e Build a library of protection-oriented utility ee 
programs 
e Get help with your specific problems 
e Learn about the latest advances in protection 
hardware and software 


All this and more can be yours by subscribing 
to the Apple Software Protection Digest. A one- 
year subscription is $24, two years is $42. 


wie aed vo or 
menh why open Guba apie con 
Sms enue PUNK aten Pets Peat feet en. 


Ful 10 Gitaber 
Pdi A PuNoher 


SUBSCRIBE TODAY! 


B 


REDLIG SYSTEMS, INC., Dept. A135 
2068 - 79th St., Brooklyn, NY 11214 


Please enter my _______ year subscription to Apple Software Protection Digest. 


(J Enclosed is my check for 


(J Please charge my credit card: O VISA O MasterCard LJ American Express 

Card Number ___—C—s—CsCSSSCSCSCMEEpp. Date LL Signature 
Name 

Address 

City State Zip 
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031E- AO 04 1280 LDY #4 MOVE 5 BYTES 
0320- BD 71 03 1290 2 LDA PATCHES »X 
0323- 91 00 1300 STA ($00),Y 
0329- CA 1310 DEX 
0326- 88 1320 DEY 
032 - 10 F7 1330 BPL .2 
0329- 60 40 : RTS 
1320 REBOOT 
032A- 78 1370 SEI TURN OFF INTERRUPTS 
032B- 20 EA 03 1380 JSR $03EA RESET THE I/O HOOKS 
032E- A5 37 1390 LDA $37 WHICH DOS? 
0330- C9 BD 1400 CMP #$BD IS IT 64K DOS ? 
0332- 30 0C 1410 BMI NO IT IS NOT 
O33h - c 81 CO 1420 BIT $C081 YES IT IS, SO TURN 
0337- 2C 81 CO 1430 BIT $C081 OFF LANGUAGE CARD 
O33A- 20 16 E3 1440 JSR $£316 DOS "CLOSE" ALL FILES 
0 Bb- 4c 66 D5 1450 JMP $D56 APPLESOFT "RUN" 
63 O- 20 16 AZ 1460 .1 JSR $A31 DOS "CLOSE" ALL FILES 
0343- 4C FC A 1470 é JMP $A4FC 48K "DOS RUN® 
1490 USR 
0346= AO 00 1500 LDY #0 
0348- B9 67 03 1510 .1 LDA PASSWORD,Y GET PASSWORD TEXT 
O34B- FO 0 1520 BEQ .2 ..END OF STRING 
0 4D- 2 6B 03 1930 JSR PRINT NO, SO PRINT IT 
0353- 20 6E 03 1570 .2 JSR INPUT GET A KEY 
032 - C9 AA 1260 CMP #"@ nan 2 
0358- DO 0C 1590 BNE .4 NO, SO BYE BYE 
035A- 20 6E 03 1600 JSR INPUT YES , SO GET ANOTHER 
035F- DO 05 1620 . BNE .4- NO, SO BYE BYE 
0361- A2 09 1640 LDX #P2-PATCHES 
0363- 0 OE 03 1650 JSR PATCH.DOS 
0366- 60 16 0 4 RTS WE HAVE FINISHED 
1680 # TEXT TO BE PRINTED WHEN A 
1690 # "PRINT USR(O)"_ COMMAND IS DONE 
1700 « IN APPLESOFT 
1720 PASSWORD 
0367- DO D7 BA 1730 .AS -"py:" 
036A- 00 17H0 -HS 00 
1760 ® INPUT AND PRINT SUBROUTINES 
036B- 6C 36 00 140 PRINT JMP ($36) 
036E- 6C 38 00 1790 INPUT JMP 38 
18.10 PATCHES 
0371- 4C 2A 03 1820 JMP REBOOT CALL OUR NEW CODE 
0374- EA 1830 NOP WEEDED FCR BDIVERSI-DOS 
0375- EA 1gh0 PI NOP 
0376- a9 0239 -—ti‘(i‘i‘(<i<C OWT 
0379- 09 1860 ~HS A9023909 ORIGINAL CODE 
O37A- AQ 1370 p2 ~HS AQ 
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